home *** CD-ROM | disk | FTP | other *** search
/ Flashy TrueType Fonts / Flashy TrueType Fonts.iso / golf / install.dat < prev    next >
Text File  |  1996-06-10  |  4KB  |  139 lines
  1. /*
  2.  * INSTALL.DAT
  3.  * Project: GOLF Tip-A-Day
  4.  * Version: 1.25
  5.  * cd-rom version
  6. */
  7.  
  8. @DefineProject
  9.     @Name = "GOLF Tip-A-Day"
  10.         @Version = "1.25"
  11.         @Subdir = "\\GOLFTIPS"
  12.     @OutDrive = Z
  13. @EndProject
  14.  
  15. @DefineVars
  16.     @Qstring @PkgType    = "BOX"
  17.     @Integer @Blue       = @RGB(0,0,255)             //DEFINE COLOR BLUE
  18.     @Integer @Black      = @RGB(0,0,0)               //DEFINE COLOR BLACK
  19. @EndVars
  20.  
  21. @BackgroundMode(3,@Blue,@Black)
  22. @Display
  23.     @Cls
  24.  
  25.     Congratulations on your purchase of @Name!
  26.     
  27.     This program will now install @Name 
  28.     to your hard disk drive and verify the integrity
  29.     of the CD-ROM disk. You may press the [Esc] key
  30.     at any time to abort the installation.
  31.     @Pause
  32. @EndDisplay
  33.  
  34. @PkgType = @GetINI ("COSMI CDSETUP", "PkgMethod")
  35.  
  36. @GetOutDrive
  37.     @Cls
  38.     Select the HARD disk drive on which you wish to install your
  39.     new copy of @Name.  ie. "Drive C:"
  40.  
  41.  
  42.  
  43.  
  44.     
  45.     @Suppress(0, 1)
  46.     Use the [CURSOR] to highlight a drive letter. Press [ENTER]
  47.     to select that drive.
  48. @EndOutDrive
  49.  
  50. @DefineVars
  51.  
  52.         @Qstring @Item1 = "@OutDrive:\\@Subdir\\golfcldr.exe, @Name,
  53.                            @OutDrive:\\@Subdir\\golfcldr.exe"
  54.         @Qstring @Item2 = "@OutDrive:\\@Subdir\\golfcal.hlp, @Name Help,
  55.                            @OutDrive:\\@Subdir\\golfcal.hlp"
  56.     @Qstring @Item3 = "@OutDrive:\\@Subdir\\gtadman.wri, @Name Manual,
  57.                @OutDrive:\\@Subdir\\gtadman.wri"
  58.     
  59.     @Qstring @Item4 = "@OutDrive:\\@Subdir\\walls.exe, Walls,
  60.                @OutDrive:\\@Subdir\\walls.exe"
  61.     @Qstring @Item5 = "@OutDrive:\\@Subdir\\walls.wri, Walls Manual,
  62.                @OutDrive:\\@Subdir\\walls.wri"
  63.  
  64.  
  65. @EndVars
  66.  
  67. @DefineDisk
  68.     @Label = "GOLFTIP  Disk #1"
  69.     @BeginLib 779.001
  70.         @F GOLFCAL.ICO @S 766 @O GOLFCAL.ICO
  71.         @F GOLFTIP.ICO @S 766 @O GOLFTIP.ICO
  72.                 @F GOLFTIPS.SCR @S 1382656 @O @WindowsDrive:\\@WindowsDir\\GOLFTIPS.SCR
  73.                 @F GOLFTIPS.INI @S 81 @O @WindowsDrive:\\@WindowsDir\\GOLFTIPS.INI
  74.         @F TIPS.DAT @S 272161 @O TIPS.DAT
  75.         @F GLASS.WAV @S 10952 @O GLASS.WAV
  76.         @F TIPTITLE.PTR @S 4292 @O TIPTITLE.PTR
  77.         @F TIPTEXT.PTR @S 4292 @O TIPTEXT.PTR
  78.         @F SWISH.WAV @S 2088 @O SWISH.WAV
  79.         @F SUB.WAV @S 11134 @O SUB.WAV
  80.         @F KABOOM.WAV @S 5224 @O KABOOM.WAV
  81.         @F SPLASH1.WAV @S 2032 @O SPLASH1.WAV
  82.         @F SPLASH2.WAV @S 15086 @O SPLASH2.WAV
  83.         @F PLOP.WAV @S 2400 @O PLOP.WAV
  84.         @F PIPE.WAV @S 239540 @O PIPE.WAV
  85.         @F BONK.WAV @S 4268 @O BONK.WAV
  86.         @F GOLFCLDR.EXE @S 333824 @O GOLFCLDR.EXE
  87.         @F GOLFCAL.HLP @S 12474 @O GOLFCAL.HLP
  88.         @EndLib
  89. @EndDisk
  90.  
  91.  
  92. @Write("@WindowsDrive:\\@WindowsDir\\CONTROL.INI", "at", "[Screen Saver.Golf Tips]\n")
  93. @Write(, , "MaxChangeMinutes=4 \n")      
  94. @Write(, , "HaskellBadness=50 \n")
  95. @Write(, , "TipPath=@OutDrive:\\@Subdir\\ \n")      
  96. @Write(, , "SoundFlag=1 \n")
  97.  
  98. // @Write("@WindowsDrive:\\@WindowsDir\\GOLFTIPS.INI", "wt", "[Config]\n")
  99. // @Write(, , "TipPath=@OutDrive:\\@Subdir\\ \n")      
  100. // @Write(, , "ChangeMinutes=2 \n")
  101. // @Write(, , "HaskellBadness=48 \n")      
  102. // @Write(, , "SoundFlag=1 \n")
  103.  
  104. @Finish
  105.  
  106. @If("@PkgType" == "JEWEL")
  107.     @ProgramManager("[CreateGroup(COSMI @Name)]
  108.          [AddItem(@Item1, 0)][AddItem(@Item2, 0)]
  109.          [AddItem(@Item3, 0)][AddItem(@Item4, 0)]
  110.          [AddItem(@Item5, 0)]")
  111.     @Copy("walls.*", "@OutDrive:\\@Subdir\\*.*")
  112.     @Copy("*.wav", "@OutDrive:\\@Subdir\\*.*")
  113. @Else
  114.     @ProgramManager("[CreateGroup(COSMI @Name)]
  115.          [AddItem(@Item1, 0)][AddItem(@Item2, 0)]
  116.          [AddItem(@Item3, 0)][AddItem(@Item4, 0)]
  117.          [AddItem(@Item5, 0)]")
  118.     @Copy("walls.*", "@OutDrive:\\@Subdir\\*.*")
  119.     @Copy("*.wav", "@OutDrive:\\@Subdir\\*.*")
  120. @EndIf
  121.     @Copy("Gtadman.wri", "@OutDrive:\\@Subdir\\*.*")
  122.  
  123.     @ChDrive @OutDrive
  124.     @ChDir "@SubDir"
  125.     //delete files from cosmitmp.dir and remove that dir
  126.     @Delete("@OutDrive:\\cosmitmp.dir\\*.*")
  127.     @RmDir("@OutDrive:\\cosmitmp.dir")
  128.  
  129.     @Cls
  130.     Installation of @Name is now finished.
  131.     
  132.     A New application group has been created titled COSMI.
  133.  
  134.         
  135.     @Pause
  136. @EndFinish
  137.  
  138. /* end-of-file */
  139.